home *** CD-ROM | disk | FTP | other *** search
/ Hidden Truth / Hidden Truth.iso / amiga / aweb_pal64 < prev    next >
Encoding:
Text File  |  1997-03-06  |  1.1 KB  |  37 lines
  1. c:requestchoice >env:rcp64 "Welcome To The Hidden Truth" "Screenmode: *nPAL Hi-Res Laced *n 640x512 *n  64 Colours *n *nSelect from below whether you would like to *nopen your screen in colour or greyscale" " Colour | Greyscale | Cancel "
  2.  
  3. if $rcp64 eq 1
  4.  
  5.   failat 100
  6.   stack >NIL: 20000
  7.   assign >NIL: devs: Truth:amiga/devs
  8.   assign >NIL: LIBS: Truth:AMIGA/Classes ADD
  9.   assign >NIL: sys: Truth:AMIGA ADD
  10.   assign >NIL: libs: Truth:amiga/libs add
  11.   assign >NIL: fonts: Truth:amiga/fonts add
  12.   assign >NIL: env: Truth:amiga/env-pal add
  13.   Assign >NIL: JPEGTMP: "ram:"
  14.   C:AddDataTypes >NIL: REFRESH QUIET
  15.   assign >NIL: devs: sys:devs
  16.   aweb >NIL: config aweb_pal64
  17.  
  18. endif
  19.  
  20. if $rcp64 eq 2
  21.  
  22.   failat 100
  23.   stack >NIL: 20000
  24.   assign >NIL: devs: Truth:amiga/devs
  25.   assign >NIL: LIBS: Truth:AMIGA/Classes ADD
  26.   assign >NIL: sys: Truth:AMIGA ADD
  27.   assign >NIL: libs: Truth:amiga/libs add
  28.   assign >NIL: fonts: Truth:amiga/fonts add
  29.   assign >NIL: env: Truth:amiga/env-pal add
  30.   Assign >NIL: JPEGTMP: "ram:"
  31.   C:AddDataTypes >NIL: REFRESH QUIET
  32.   assign >NIL: devs: sys:devs
  33.   aweb >NIL: config aweb_pal64g
  34.  
  35. else
  36.   endcli
  37. endif